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ABSTRACT 

Revised  material  from  earlier  Project  Solo 
newsletters  is  presented  here.  The  revised  material  updates  programs 
to  explain  the  law  of  sines  and  cosines  and  to  apply  the  idea  of 
rectangular  coordinates  approach  to  aircraft  navigation  systems  such 
as  VORTAC.  A brief  discussion  of  the  value  of  off-line  as  opposed  to 
on-line  activity  is  also  presented.  (JY) 
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Newsletter  No.  14 


March  17,  1971 


Updates  of  Newsletters  No,  1 and  No.  7 


The  number  of  requests  to  receive  the  Project  Solo  newsletter  is  growing 
more  rapidly  than  any  of  us  had  anticipated.  Since  our  present  budget  does  not 
permit  reprinting,  we  will  in  general  only  be  able  to  send  more  recent  issues  in 
response  to  new  requests.  To  partly  fill  the  gap,  we  have  reprinted  revised  ver- 
sions of  the  material  that  appeared  in  newsletters  No.  1 and  No.  7.  Since  new 
material  has  been  added,  these  revisions  are  being  sent  with  this  newsletter  (No* 
14)  to  all  persons  on  our  mailing  list.  Example  No.  3 on  page  16  of  "Some  Prin- 
ciples for  the  Human  Use  of  Computers  in  Education"  might  give  teachers  and  stu- 
dents some  new  ideas  about  a less  structured  form  of  CAI.  The  best  way  to  create 
files  of  the  kind  shown  there  is  through  QED, 


Example : 


-QED 

^APPEND 

SLIPPERY  SOCK  MENU: 

HASH 

OLD  HASH 

VERY  OLD  HASH 

Dc 

-WRITE  /MENU/ 

NEW  FILE?  YES 
*EXIT 

-DEF  /MENU/  AS  PUB 


Everything  typed  here  will  be 
stored  on  the  file  /MENU/ 


Off-Line  Activity,  Chinese  Proverbs,  and  Piaget 


A valuable  aspect  of  solo  mode  computing  is  the  off-line  planning  and  analysis 
it  invites,  especially  when  these  activities  take  place  in  concert  with  teachers  and 
fellow  students.  Off-line  activity  is  most  effective  when  coordinated  with  on-line 
activity.  This  can  be  done  for  even  simple  topics,  as  the  example  /SOLID/  on  the 
next  page  illustrates. 


While  using  the  computer  (and  plotter)  on-line,  the  student  approaches  the 
learning  ideal  suggested  in  the  Chinese  proverb  "I  hear,  and  I forget;  I see,  and  I 
remember;  I do,  and  I understand".  Off-line  discussion  can  play  the  important  role 
of  recognizing  what  the  student  has  done,  thus  establishing  a fundamental  union 
between  the  cognitive  and  affective  domains.  As  Piaget  writes,  "social  life  affects 
intelligence. . . it  provides  (the  student)  a ready-made  system  of  signs  which  modify 
his  thoughts".  The  responsibility  of  teachers  to  give  encouraging  signs  to  students 
who  have  accepted  and  mastered  the  on-line  challenge  is  large,  and  deserving  of 
considerable  attention. 


^Supported  in  part  by  NSF  grant  GJ-1077 
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SAMPLE  APPROACH  TO  MIXING  OFF- 
LINE WITH  ON-LINE  ACTIVITIES: 
Subject:  Introduction  to  Cartesian 
Graphs . 


Off-Line  (Planning) 

1.  Explain  use  of  rectangular  coor- 
dinates in  class  - be  brief,  going 
immediately  into. . . 

2.  Use  of  coordinate  pairs  by  each 
student  to  describe  a planar  figure 
of  his  or  her  choice,  to  then  be 
used. * * 

On-Line  (Active  Use  of  Concepts) 

>RUN  166TD  /SOLID/ 


THIS  PROGRAM  WILL  TRY  TO  PLOT  A "3-Dn  PICTURE  BASED  ON  A PLANAR 
POLYGON  YOU  DESCRIBE.  PLEASE  INPUT  2 COORDINATES  (X,  Y)  AFTER  EACH 
>’?  » TO  DESCRIBE  THE  VERTIC.ES  OF  YOUR  POLYGON.  START  WITH  THE  VER- 
TEX THAT  HAS  THE  SMALLEST  Y VALUE,  AND  THEN  PROCEED  COUNTER- 
CLOCKWISE AROUND  THE  POLYGON. 

FIRST. . .HOW  MANY  VERTICES  DO  YOU  WISH 
7 5 

NOW  ENTER  THE  COORDINATES  OF  THE 
VERTICES,  WITH  1<X<14  AND  1<Y<9 
? 6, 6 
? 7, 6.  5 
76.5,8 
7 5.5,7 
76,6.5 
PLTL 


(This  then  produces  the  pic?'  shown  above.  This  would  normally  be  done  on  coor- 
dinate paper  allowing  the  students  to  identify  points. ) 


Off-Line  (Analysis  and  Challenge) 

3.  What  are  the  coordinates  of  the  new  points  the  plotter  added  to  the  points 
supplied  by  the  student? 

4.  Can  the  student  theorize  what  "rule"  the  plotter  used  to  get  the  new  points? 

5.  Go  back  to  2,  trying  to  describe  a more  intricate  figure  that  will  amaze 
plotter,  teacher,  and  friends ! 

6.  Curious  students  will  want  (and  should  receive)  the  module  that  explains 
the  plotter  program. 


V0RTAC-T1 


GENERAL  DISCUSSION  FOR  TEACHERS 

Included  in  this  section  are  listings  of  two  programs  which 
are  working  versions  of  the  program  assigned  in  the  module , together 
with  comments  explaining  them  in  detail.  The  first  of  these  does 
not  include  the  optional  segment,  and  the  Law  of  Sines  and  Cosines 
approach  is  taken  (see  problems  1 and  3 in  the  module).  The  second 
one  includes  the  optional  segment,  and  applies  the  conversion  to 
rectangular  coordinates  approach  (see  problem  2 in  the  module) . 

The  basic  idea  in  the  first  program  is  to  find  both  the  angle 
at  the  aircraft, A3  (in  the  triangle  formed  by  the  aircraft  ,VORTAC  and 
destination)  and  the  direction  of  the  VORTAC  from  the  aircraft,  Y. 
Then  the  direction  of  the  destination  fromthe  aircraft, X, is  computed 
as  either  Y + A3  or  Y - A3.  The  decision  regarding  which  of  these 
is  appropriate  is  as  follows: 

The  number  Z,  is  computed  as  the  bearing  of  the  destination 
from  the  VORTAC  if  the  coordinate  system  is  rotated  so  that  the 
aircraft  has  a bearing  of  0.  If  Z is  between  0 and  ir,  then  X is 
set  equal  to  Y - A3?  otherwise,  it  is  set  equal  to  Y + A3. 

In  the  second  program,  the  rectangular  coordinates  of  the 
destination  and  plane  are  found,  and  the  slope  of  the  line  between 
them  is  computed.  The  arctangent  of  that  slope  is  then  added  to, 
or  subtracted  from  ir  or  2ir  (=  0 ) , as  appropriate . 

In  the  experience  of  the  developers  of  the  module,  the  rectan- 
gular coordinates  approach  is  more  straightforward  and  easier  to 
program. 


FOOTNOTE  ON  THE  FOOTNOTE  (page  3):  Some  students  may  be  inter- 
ested in  the  following  quote  from  Norbert  Wiener  ("God  and  Golem*1) 

No,  the  future  offers  very  little  hope  for  those  who  expect 
that  our  new  mechanical  slaves  will  offer  us  a world  in  which 
we  may  rest  from  thinking.  Help  us  they  may,  but  at  the  cost 
of  supreme  demands  upon  our  honesty  and  our  intelligence. 

The  world  of  the  future  will  be  an  ever  more  demanding- struggle 
against  the  limitations  of  our  intelligence,  not  a comfortable 
hammock  in  which  we  can  lie  down  to  be  waited  upon  by  our 
robot  slaves.  


The  bearing  of  a point  from  the  VORTAC  will  always  mean  the  angular 
polar  coordinate  of  that  point,  using  the  VORTAC  as  origin. 
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1*11 

1*12 

1*13 

1*14 


1*15 

1*16 


1*17 

1*18 

1*19 

1*2 


1*21 

1*215 


1*22 

1*221 

1*222 

1*2221 

1*2222 

1*2223 

set 

1*223 


1*224 


1*23 

1*24 

1*25 


COMPLETED  PROGRAM  (SEGMENT  1)— TEACHER 


demand  E« 
demand  D« 
demand  S3* 
demand  SI. 


Input  statements  for  plane's 
bearing (E) ; destination's  bearing 
(D);  distance  of  destination  from 
VORTAC  (SI);  and  distance  of  plane 
from  VORTAC  (S3)  , respectively. 


set  D-0/360*2*3. 14159. 
set  E«E/360*2*3. 14159. 


Conversion  of  bearings  from 
degrees  to  radians 


if  SI  $ne  0,  to  step  1.21 
set  S2*S3* 

set  X»D*  * 

to  step  1*85* 


If  the  plane  is  at  the  VORTAC,  the 
course  is  set  equal  to  the  bearing 
of  the  destination,  and  the  dis- 
tance of  the  plane  from  the  desti- 
nation is  set  equal  to  the 
distance  of  the  destination  from 
the  VORTAC. 


The  angle  A2  at  the  VORTAC  (in  the 
triangle  determined  by  the  plane, 
the  VORTAC,  and  the  destination) 
is  found  by  taking  the  absolute 
value  of  the  difference  between 
the  bearings  of  the  plane  and  the 
destination.  If  this  difference 
is  greater  than  it,  the  angle  is  set 
equal  to  2ir  minus  the  difference. 


if  |A2|>0*01,  to  step  1.224* 

set  S2*|S1-S3|  * < 

If  Sl>$3,  to  step  1*2223* 
set  X*D. 
to  step  1*85. 

If  E<3*14159, 

X*E+3* 14159;  set  X*E-3. 14159. 
to  step  1*85* 


If  the  plane  and  the  destination 
have  the  same  bearing,  or  close  to 
it,  the  distance  between  the  plane 
and  the  destination  is  set  equal  to 
the  absolute  value  of  the  differ- 
ence between  the  distances  of  the 
plane  and  destination  from  the  VOR 
TAC  (again,  the  magnitude  is  what's 
important) . If  the  plane  is  closer 
to  the  VORTAC  than  the  destination,  . 
the  course  is  set  equal  to  the  bear- 
ing of  the  destination;  otherwise 
the  course  is  set  equal  to  the 
bearing  of  the  destination  ± 180°. 


If  the  plane,  the  destination,  and 
the  VORTAC  lie  in  a line,  or  nearly 
so,  with  the  plane  and  destination 
on  opposite  sides  of  the  VORTAC, 
the  course  is  set  equal  to  the  bear- 
ing of  the  destination*  The  dis- 
tance between  the  plane  and  desti- 
nation is  set  equal  to  the  sum  of  the 
distance  from  the  plane  to  the 
VORTAC  and  the  distance  from  the 
VORTAC  to  the  destination. 


* 
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1.26 


set  S2*sqrt  of 


(S3*S3+Sl*Sl-2*S3*Sl*cosine  of  A2). 


1.27  set  S*(S3*sine  of  A2)/S2. 


1.28 


1.29 


if  t S|  $ge  i#  Set  OO; 

set  C*sqrt  of  (X-S*S). 


If  |C|<0.0001,  <- 

set  A3*l. 570795; 


set  A3*arc  tangent  of  (S/C). 


1.3 


If  S3*S3>S1*S1+S2*S2, 

set  A3-3.14159-A3. 


1.31  if  £<3*14159, 

set  Y-E+3. 14159;  set  Y«E-3. 14159. 


1.33  set  Z-D-E. 

1.34  if  Z<0,set  Z»Z+6. 28318. 

1.35  If  Z<3. 14159, 

set  X*Y-A3;set  X-Y+A3. 


1.85 

set  XX*X+360/ (2+3* 14159) . 

1.855 

if  XX<0,  set  XX-XX+360. 

1.856 

If  XX>36 0,  set  XXSXX*360. 

1.86 

type  "direction  and 

distance  of  destination 

1.87 

type  XX, S2. 

1.99 

done. 

Application  of  the  Law  of  Cosines 
to  find  the  distance  (S2)  front  the 
plane  to  the  destination. 

Application  of  the  Law  of  Sines 
to  find  the  sine  of  the  angle (A3) 
at  the  plane  in  the  triangle  formed 
by  the  plane,  the  VORTAC,  and 
the  destination. 

Computation  of  the  cosine  of  the 
angle (A3)  at  the  plane.  The  posi- 
tive value  of  the  square  root  is 
used  (see  below) . 

If  the  cosine  is  equal  to  or  close 
to  zero,  the  angle (A3)  is  set 
equal  to  ir/2j  otherwise,  it  is  set 
equal  to  the  arctangent  of  the 
sine  over  the  cosine  as  computed 
above.  The  arctangent  function  in 
PIL  returns  for  positive  arguments 
values  which  are  between  0 and  w/2. 
Since  the  sine  and  cosine  as  com- 
puted above  are  positive,  in  this 
program  the  acute  angle  determined 
by  the  line  from  the  VORTAC  to  the 
plane  and  the  line  from  the  desti- 
nation to  the  plane  is  computed. 

When  the  obtuse  angle  at  the  plane 
is  actually  of  interest,  the  sup- 
plement of  the  angle  as  computed 
above  is  found. 

The  direction  from  the  plane  to 
the  VORTAC  (Y)  is  found.  This  is 
the  opposite  (±180°)  to  the  bear- 
ing of  the  plane  from  the  VORTAC. 

The  bearing  of  the  destination (Z) , 
with  respect  to  a line  from  the  VOR 
TAC  to  the  aircraft,  is  computed. 

If  Z is  less  than  ir,  A3  is  sub- 
tracted from  Y to  find  the  course; 
otherwise  it  is  added  to  Y. 

[The  course  from  the  present  location 
of  the  plane  to  the  destination  is 
converted  from  radians  to  degrees. 

The  course  is  converted,  if  ne- 
cessary, to  an  equivalent  value 
between  0°  and  360° . The  course 
and  distance  to  the  destination 
are  printed. 


1.13 

1.14 

1.15 

1.16 
1.17 
1.23 
1.  24 
1.25 
1.  26 
1.27 


1.32 

1.33 

1.35 

1.36 

1.37 

1.38 

1.4 

1.85 


1.855 


1.86 

1.87 


1.9 
1.91 
1. 96 


1.97 


2.0 

2.01 

2.021 

2.022 

2.023 

2.024 

2.025 

2.04 


2.041 


type  “Enter  distance  of  plane  from  VORTAC.". 
demand  SI. 

type  “Enter  direction  of  plane  from  VORTAC,11. 
type  “in  degrees  clockwise  from  north. “. 
demand  E. 

type  “Enter  distance  of  destination  from  VORTAC.". 
demand  S3. 

type  “Enter  direction  of  destination  from  VORTAC". 
type  “in  degrees  clockwise  from  north. 19 . 
demand  D. 


VORTAC -T 4 
(PIL) 


j^Input 


section . 


set  D-D/360*2*3. 14159. 
set  E-E/360*2*3. 14159. 
if  SI  $ne  0,  to  step  1.4 
set  S2sS3. 

set  X=D.  < 

to  step  1.85. 

do  part  3. 

set  XX*X*360/(2*3. 14159) 


if  XX  < 0,  set  XX-XX+360. 


Conversion  from  degrees  to  radians. 


If  the  plane  is  at  the  VORTAC,  the 
course  is  set  equal  to  the  bearing 
of  the  destination,  and  the  distance 
of  the  plane  from  the  destination 
is  set  equal  to  the  distance  of  the 
VORTAC  from  the  destination. 

Conversion  of  direction  to  the  des- 
tination from  radians  to  degrees. 

If  the  direction  to  the  destination 
is  negative,  the  equivalent  positive 
angle  is  found. 


type  “Direction  and  distance  of  destination”, 
type  XX, S2. 


Prints  out  the 
direction  to  and 
distance  from 
the  destination. 


type  “If  you  wish  to  fly  further, type  yes  in  quotes.", 
demand  answer. 


if  answer*"yes",do  part  2;done. 


to  step  1. 35. 


Person  running  program  is  questioned 
regarding  whether  he  wants  to  see 
the  effect  of  the  wind  after  some 
elapsed  time.  If  he  answers  'yes,' 
part  2 is  executed;  otherwise,  pro- 
gram is  finished. 

After  execution  of  part  2,  control 
is  transferred  to  step  1.35. 


type  “Enter  plane's  speed." 
demand  VI. 

type  "Enter  wind's  speed.".  ^ 

demand  Wl. 

Type  "Enter  direction  fro  i which  wind  is  blowing,", 
type  “In  degrees  clockwise  from  north.", 
demand  Dl. 


Input  section 
for  part  2. 
Speeds  are  in 
miles  per  hour. 


If  Dl  $ge  180, set  Dl«Dl-180;set  D1*D1+180. 


set  Dl=Dl/360*2*3. 14159. 


The  direction  from  which 
the  wind  is  blowing  is 
converted  to  the  direc- 
tion to  which  it  is 
blowing. 


The  wind's  direction  is  converted 
to  radians. 


O 

o 
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2.  05 

2.051 

2.052 

2.053 

2.054 

2.055 

2.06 


2.07 


2.08 


2.11 

2.12 

2.13 

2.14 


2.21 


2.22 

2.23 


2.24 

2*31 

2.32 

3.01 

3.02 

3.03 

3.04 

3.1 


type  "Enter  an  elapsed  time 
demand  T.  ln  minutes-"- 


relapsed  time  is  input. 


set  T*T/60.  ^ 

type  "Enter  heading.", 
demand  H. 

set  H*H/36 0*2*3. 14159. 
set  Nl* 

(Vl*si ne  of  H ♦ Wl*sine  of  Dl) 

*T  +S1*SI ne  of  E. 

set  N2* 

(Vl*cos  of  H ♦ Wl*cos  of  Dl) 

*T  +Sl*Coslne  of  E 


Time  is  converted  from  minutes 
|_to  hours. 

(Heading  is  input  and  converted  to 
[radians. 

New  rectangular  coordinates  of  the 
plane  after  it  has  flown  for  the 
elapsed  time  with  the  heading  input 
above  are  computed.  The  effect  of 
the  wind  is  taken  into  account. 

Nl  is  the  east -west  coordinate  and 
N2  is  the  north-south  coordinate. 


set  Sl*Sqrt  of  (N1*N1+N2*N2) . 


if  I N2 | >0. 0001/ to  step  2.21. 
if  Nl  >0,  set  E*l. 570795. 

If  Nl  <0,  set  E-4. 712388. 
done.  , 


New  distance  of  the  plane  from 
the  VORTAC  is  calculated. 

If  the  plane  has  a zero  (or  very 
small)  north-south  coordinate,  the 
bearing  of  the  plane  is  set  equal 
to:  (1)  ir/2  if  the  plane  is  east 
of  the  VORTAC?  (2)  3ir/2  if  the 
plane  is  west  of  the  VORTAC. 


set  A4 *Arc  tangent  of  C 1 N1/N2 | > 


The  angle (A4)  between  a line  from 
the  VORTAC  to  the  plane  and  the 
east-west  axis  is  found  by  com- 
puting the  arctangent  of  the  ratio 
of  the  absolute  values  of  the  co- 
ordinates . 


If  Nl  <0, 

to 

step  2.31. 

If  N2>0, 

set 

E*A4; 

set  E*3. 14159-A4. 

done. 

If  N2<0, 

set 

E=3. 14159+A4; 

done. 

set  E*6. 28318-A4. 

The  angle (A4)  is  either  added  to 
or  subtracted  from  0 (=  2ir)  or  it 
depending  on  which  quadrant  the 
plane  is  in  to  find  the  plane's 
new  bearing. 


set  Fl*Sl*sln  of  E. 
set  F2*Sl*cos  of  E. 
set  81*S3*s!n  of  D. 
set  B2*S3*cos  of  D. 


The  rectangular  coordinates  of  the 
plane  and  the  destination  are  com- 
puted from  the  corresponding  polar 
coordinates . 


for  N1*F1-Bl:set  N2*F2-B2. 


The  difference  between  the  east- 
west  coordinates  Nl  of  the  plane 
and  destination  and  the  corres- 
ponding difference  between  the 
north- south  coordinates  N2  are 
computed. 


/ 


V0KTAC-T6 

(PIL) 


3. 11  set  $2®sqrt  of  <N1*N1+N2*N2). 


3.12  If  S2  $ge  ^to  step  3.21. 

?.13  type  "You  are  within  sight 

of  destination." 

3. 2 done. 

3.21  If  |N2| >0.001,  to  step  3.31, 

3.22  If  N1>0, set  X»4. 712388. 

3.23  if  Nl<0,set  X*l. 570795. 

3. 24  done. 


3.31  set  A4“arc  tangent  of  ()N1/N2t)< 


3.32 

if  N1<0, to 

step  3.41. 

3.33 

If  N2>0, set 

X*3.14159+A4; 

set  X*6.  28-318-A4. 

3.34 

done. 

3.41 

If  N2<0, set 

X 

ii 

set  Xs3. 14159-A4. 

3.42 

done. 

The  Pythagorean  theorem  is  used 
to  calculate  the  distance  from 
Ithe  plane  to  the  destination. 

[If  the  destination  is  less  than 
four  miles  from  the  plane,  the 
program  types  a message  and  stops. 

If  there  is  no  difference  (or  near- 
ly so)  in  the  porth-south  coordi- 
nates of  the  plane  and  destination 
the  course  X is  set  equal  to: 

(1)  3ir/2  if  the  destination  is 
west  of  the  plane 
(2)  ir/2  if  the  destination  is  east 
_ of  the  plane. 

The  angle (A4)  between  the  line 
from  the  plane  to  the  destination 
and  the  east-wast  axis  is  com- 
puted. 

The  angle (A4)  is  either  subtracted 
from  or  added  to  0 (=  2ir)  or  it 
depending  on  the  relative  positions 
of  the  plane  and  destination,  to 
determine  the  course  X to  the  des- 
tination from  the  plane. 


o 
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(BASIC) 


11100 

1 1 200 
1 1 300 
1 MOO 


1 1 500 
11600 

11700 
11300 
1 1 900 
1200C 


12100 

12150 

12160 


12200 

12210 

12220 

12221 

12222 

12223 

12224 

12225 

12226 
12230 


12240 


12300 

12^00 

12500 


COMPLETED  PROGRAM  (SEGMENT  1) — TEACHER 


INPUT  E 
INPUT  D 
INPUT  S3 
INPUT  SI 


LET  0=0/360*2*3*14159 
LET  E=E/ 360*2*3*  Ml  59 

IF  SI  <>  0 GOTO  12100 
LET  S2-S3 
LET  X=D 
GOTO  lei 500 


Input  statexrants  for  plane's 
bearing (E) ; destination ' s bearing 
(D) ; distance  of  destination  from 
VORTAC  (S3) ? and  distance  of  plane 
from  VORTAC  (Si) / respectively. 

Conversion  of  bearings  from 
degrees  to  radians 

If  the  plane  is  at  the  VORTAC/  the 
course  is  set  equal  to  the  bearing 
of  the  destination/  and  the  dis- 
tance of  the  plane  from  the  desti- 
nation is  set  equal  to  the 
distance  of  the  destination  from 
the  VORTAC. 


LET  A2=ABS<D-E> 

IF  A2<=3* 1 41 59  G3T9  12200 
LET  A2=6*  283 1 8-A2 


The  angle  A2  at  the  VORTAC  (in  the 
triangle  determined  by  the  plane/ 
the  VORTAC/  and  the  destination) 
is  found  by  taking  the  absolute 
value  of  the  difference  between 
the  bearings  of  the  plane  and  the 
destination*  If  this  difference 
is  greater  them  tt,  the  emgle  is  set 
equal  to  2tt  minus  the  difference* 


IF  ABS(A2)>0.01  GOT?)  12240 
LET  S2=A8S<-S1-S3) 

IF  31 >33  GOTO  12223 
LET  Xs D 
G0T3  18500 

IF  E<3* 1 41 59  COTA  12226 

LET  X=E- 3* 141 59 

GOTO  18500 

LET  X=E+3* 14159 

G3T0  18500 


If  the  pleuie  and  the  destination 
have  the  seune  bearing/  or  close  to 
it,  the  distemce  between  the  plane 
and  the  destination  is  set  equal  to 
the  absolute  value  of  the  differ- 
ence between  the  distances  of  the 
plane  and  destination  from  the  VOR 
TAC  (again/  the  magnitude  is  what's 
important ) . In  this  case,  the 
course  is  set  equal  to  the  bearing 
of  the  destination  when  the  plane 
is  farther  from  the  VORTAC  than  the 
destination  is* 


IF  A8SIA2-3* 1 41 59 )> 0*01 

GO T9  12600 


LET  S2*S1+S3 
LET  X=D 
GOTO  18500 


If  the  plane,  the  destination/  and 
the  VORTAC  lie  in  a line/  or  near- 
ly so,  with  the  plane  and  destin- 
ation oh  •pposite  sides  of  the  VOR 
TAC/  the  course  is  set  equal  to  the 
beaming  of  the  destination*  The 
distance  between  the  plane  and 
destination  is  set  equal  to  the  sum 
of  the  distance  from  the  plane  to 
the  VORTAC  and  the  distance  from 
the  VORTAC  to  the  destination* 


3 


4 


o 

ac 


12600  LET  S2=SQE 

<S3*S3+S1*S1-2*S3*S1*C0S<A2) ) 


12700  LET  S=tS3*$INCA2))/S2 


12800  IF  ABS(S>>= 1 GOTO 
12820  LET  C=  SQRC 1 - S*S  > 
12825  GOTO  12900 
12850  LET  C=G 

12900  IF  A8S(C><0.0001 
12920  LET  A3-ATM<S/C) 
12925  GOTO  13000 
12950  LET  A3=l *570795 


12850 


GOTO  12950 


13000  IF  33*S3<=S1*51+32*S2 

GOTO  13200 

13100  LET  A3=3*14159-A3 

13200  IF  £<3*14159  GOTO  13250 
13220  LFT  Y=E-3* 1 4 1 59 
13225  GOTO  13300 
13250  LF'i  Y=E+3. 14159 

13300  LF'i  ^=u-E 

13400  IF  '<>=000X0  13500 

13450  L T <=<+6.  28318 

13500  IF  <<3.14159  GOTO  13550 

13520  LET  X= Y+A3 

13525  G'j T"  18500 

13550  LFT  X=Y-A3 


18500  LET 


18550 

* 

18560 

18565 

18600 

18700 

19900 


X 1 =X*360/<2*3» 141597 


18  560 


V0RTAC-T8 

(BASIC) 

Application  of  the  Law  of  Cosines 
to  find  the  distance  (S2)  from  the 
plane  to  the  destination. 

Implication  of  the  Law  of  Sines 
to  find  the  sine  of  the  angle  (A3) 
at  the  plane  in  the  triangle  formed 
by  the  plane,  the  VORTAC,  and 
_the  destination. 

Computation  of  the  cosine  of  the 
angle (A3)  at  the  plane.  The  posi- 
tive value  of  the  square  root  is 
_used  (see  below) . 

If  the  cosine  is  equal  to  or  close 
to  zero,  the  angle (A3)  is  set 
equal  to  ir/2?  otherwise,  it  is  set 
equal  to  the  arctangent  of  the 
sine  over  the  cosine  as  computed 
above.  The  arctangent  function  in 
BASIC  returns  for  positive  arguments 
values  which  are  between  0 and  ir/2. 
Since  the  sine  and  cosine  as  com- 
puted above  are  positive,  in  this 
program  the  acute  angle  determined 
by  the  line  from  the  VORTAC  to  the 
plane  and  the  line  from  the  desti- 
nation to  the  plane  is  computed. 

When  the  obtuse  angle  at  the  plane 
is  actually  of  interest,  the  sup- 
plement of  the  angle  as  computed 
_above  is  found. 

The  direction  from  the  plane  to 
the  VORTAC  (Y)  is  found.  This  is 
the  opposite  (±180°)  to  the  bear- 
ing of  the  plane  from  the  VORTAC. 

The  bearing  of  the  destination (z ) , 
with  respect  to  a line  from  the  V0R 
TAC  to  the  aircraft,  is  computed. 

If  Z is  less  than  it,  A3  is  sub- 
tracted from  Y to  find  the 
otherwise  it  is  added  to  Y. 


course ; 


H 


18600 


if  xi>=o  goto 
T *1=X 1+360 
IF  X 1 < = 3 60  G0T0 
LEY  X 1 =X 1-360 
PRINT  "DIRECTION  AND 

DISTANCE  0P  DESTINATI0N**LSre  Pointed. 
print  xi*s2 
end 


The  course  from  the  present  location 
of  the  plane  to  the  destination  is 
converted  from  radians  to  degrees. 


! 


ih 


The  course  is  converted,  if  ne- 
cessary, to  an  equivalent  value 
between  0°  and  360° . The  course 
and  distance  to  the  destination 


Phantom  VORTAC 

0 This  module  will  guide  you  in  preparing  the  master  program 
for  an  on-board  flight  computer*  The  computer  takes  informa- 
tion from  a VHP  omni  range  system  (VORTAC) , and  calculates  the 
magnetic  course  and  distance  to  a given  airport  for  the  pilot* 
The  output  of  the  program  is  such  that  the  pilot  can  fly  to- 
ward a "phantom'1  VORTAC  located  at  any  airport  he  selects* 

£ A description  of  this  newly  developed  navigational  system 
and  the  mathematics  on  which  it  is  based  are  given  on  page  2* 
0 Pages  3 and  4 outline  alternate  methods  for  handling  the 
computation,  and  suggest  ways  in  which  previous  programs  you 
have  written  might  be  incorporated  as  sub-routines* 

0 A "real  time"  simulation  of  a flight  using  this  system  is 
suggested  as  an  advanced  level  program* 


!yyu 


VORTAC-2 


Pilots  flying  over  the  United  States  (and  most  other  countries 

* 

of  the  world)  rely  on  radio  facilities  called  VORTACs  for  navi- 
gational information.  The  basic  information  the  pilot  receives  in 
the  cockpit  is  his  position  relative  to  the  VORTAC,  given  in  polar 
coordinates . 


The  pilot  in  the  illustration  below  would  describe  his  position 


(obtained  from  his  radio  instruments)  as  being  "on  the  100°  radial 
of  the  Allegheny  County  (AGC)  VOR,  50  miles  out". 


It  is  easy  for  this  pilot  to 


4? 


note  that  he  can  get  to  AGC  by 


turning  right,  and  flying  a course 


of  280°  (Why  280°?).  If  he  is 


going  200  miles  per  hour,  it  is 


also  easy  for  him  to  estimate 


that  he  will  arrive  at  AGC  in 
15  minutes  (Is  this  exactly  true? 
— go  back  over  the  module  on  vec- 
tor addition  if  you  are  not  sure.) 
The  catch  to  all  of  this  is 


that  the  location  of  the  VOR  is 

usually  different  from  the  location  of  the  destination  airport. 

This  difficulty  can  be  handled  by  flying  two  legs,  the  first  from 
the. present* position  to  the  VOR,  and  the  second  from  the  VOR  to  the 
airport.  This  is  obviously  an  inefficient  route* 


A new  navigational  system 
uses  an  on-board,  special-purpose 
computer  to  tell  the  pilot  what 
course  and  distance  to  fly  in  or- 
der to  go  directly  from  his  present 
position  to  the  airport*  Let's 
first  examine  three  ways  of  analyzing 


computation . 


it 

Very  high  frequency  Omni  Range  and  TACAN,  where  TACAN  is  an  older 
military  system  of  distance  measuring  equipment*  Most  civilian 
pilots  call  these  facilities  VOR-DME  stations. 


**The  angular  direction  of  the  intended  flight  path,  measured  clock- 
wise from  N. 
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Before  writing  a program  for  such  an  on-board  computer,  it 
would  be  useful  for  a programmer  to  solve  by  hand  typical  problems 


arising  in  -this  situation,*  At  this  point,  let's  look  at  three  such 
solutions • 


Problem  1,  The  aircraft  is 
150  miles  oat  on  the  135°  radial 
-and  the  destination  airport  is 
100  miles  out  on  the  210°  radial. 
That  is,  in  the  diagram.  Si  = 150, 
E = 135°,  S3  * 100,  D » 210°. 


Let  A2  be  the  angle  determined 
by  SI  and  S3.  Hence,  A2  = 

210°  - 135°  - 75°.  By  the  Law  of 
Cosines , 


S2  « /1002  + 150 2 - 2 • 100  * 150  • cos (75°)  - 157.3  miles. 
Now  by  the  Law  of  sines*  sin  A3  * (100  • .966)/157.3  * .614  and 


cos  A3  =*  /l  -,6142=  .789.  Prom  this  we  can  get  A3  * arctan(.614/.789) 


* 38°.  (Why  wasn't  A3  computed  directly  from  sin  A3?)  Therefore 
X = 135°  + 180°  - 38°  * 277°.  Output  to  the  pilot  is  157.3  miles, 
277® — is  this  answer  reasonable? 

Problem  2.  The  airplane  is  250  miles  out  on  the  45°  radial 

and  the  destination  airport  is  100  miles  out  on  the  280°  radial. 

In  terms  of  the  diagram,  SI  * 250,  E » 45°,  S3  * 100,  D » 280°.  i 

Converting  the  positions  of  the  aircraft  and  destination  to  ^ 

rectangular  coordinates  with  the  VC 

x * 250  * sin  45°  * 176.8  miles , 

P 

yp  a 250  • cos  45°  * 176.8  miles, 
x^  = 100  • sin  280°—  -98.48  miles 


yd  * 100  • cos  280?*  17.36  miles 


176.8  - (-98.48) 
arctan  (.5792)  * 30.1° 


VORTAC 


VORTAC 


This  is  another  way  of  saying  that  computers  do  not  remove  the  re 


sponsibility  of  analyzing  a problem  before  solving  it — quite  the 
contrary;  they  demand  more  thought  than  ever.  This  may  be,  in  fact, 
one  of  the  most  important  contributions  computing  systems  can  make 
to  learning. 
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. * 


Therefore  X = 270°  - 30.1°  = 239.9°. 


By  the  Pythagorean  Theorem 

Hence  the 


S2  = / (176 . 8 - 17. 36)  2 + (176.8  - (-98. 48) ) 2 « 318.1. 
output  to  the  pilot  is:  318.1  miles/  239.9°. 

Problem  3,  Tne  aircraft  is  150  miles  N 

out  on  the  120°  radial  and  the  destination 

airport  is  400  miles  out  on  the  150°  ra- 
. ** 

dial.  In  the  diagram/  E = 120°,  SI  = 150_ 
miles,  D = 150°,  S3  *■  400  miles.  Using 
the  same  reasoning  as  in  Problem  1 yields: 

A2  = 30° 

S2  = /4002  + 1502-  2 • 150  • 400  • cos  30° 

= 280.3  miles 

sin  A3  = 400  • (.5236/280.3)  = .7135 
cos  A3  = /I  - .7135 2 « .7007 
A3  = arctan  (.7135/. 7007)  » 45.52° 

X s 120°  + 180°  - 45.52°  » 254.48° 

Output  to  the  pilot  is:  280.3  miles/ 

254.48° — does  this  answer  look  reason- 
able? What  went  wrong? 

Assignment.  Write  a program  for  an 
on-board  navigational  computer  which  will 

accept  as  input  the  radial  and  distance  from  a VORTAC  of  both  an 
aircraft  and  a destination/  and  which  will  compute  a course  and 
distance  to  the  destination.  The  trigonometric  subroi. .lines  in  the 
computer  require  arguments  in  radians/  but  pilots  think  in  terms 
of  degrees/  so  it  will  be  necessary  for  you  to  convert  degrees  to 
radians  and  back  (see  the  module  on  converting  to  radians) . Other 

it 

possibly  useful  topics  ire  inverse  trigonometric  functions  , the 

• z it 

Laws  of  Sines  and  Cosines  , and  transformation  of  polar  to  rectan- 

it 

gular  coordinates  . 


See  modules  you  have  worked  previously. 

Hr* 

By  now  you  should  have  noticed  that  the  word  radial  is  used  to 
designate  the  angular  position  of  a line  segment  that  starts  at  th< 
VORTAC. 


o 
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Optional  Section.  During  most  flights,  the  aircraft  moves 
through  the  air  and  the  air  moves  as  well*  Write  an  addition  to 
your  program  which  will: 

1.  Accept  as  additional  input,  specified  by  the  'pilot*, 

(a)  the  aircraft's  speed,  (b)  the  speed  of  the  wind,  (c)  the  direc- 

• ^ 
tion  of  the  wind,  (d)  an  elapsed  time,  t,  and  (e)  a heading  for  the 

aircraft.  Any  heading  should  be  acceptable:  the  'pilot*  should  be 

able  to  fly  wherever  he  likes. 

2.  Compute  the  new  position  of  the  aircraft  on  the  basis 
of  the  above  information. 

3.  Repeat  steps  1 and  2 as  often  as  desired  or  necessary  to 
reach  the  destination  airport. 

You  can  look  at  the  input/output  sequence  of  one  program  that 
accomplishes  this  and  has  been  written  and  stored. 

In  order  to  gain  access  to  this  program,  please  logon  (direc- 
tions are  given  in  an  introductory  module)  using  the  User  Identifi- 
cation Code  given  to  you  by  your  teacher: 


In  order  to  interact  with  this  stored  program  type  in  the  statements 


Prom  this  point  on  the  operation  of  the  program  should  be  self- 
explanatory. 


* 

Heading  is  defined  as  the  angular  direction 
axis  of  the  aircraft  with  respect  to  North, 
the  pilot  is  flying  a course  of  90°,  but  his 


of  the  longitudinal 
In  the  picture  below, 
heading  is  65° . Why? 


North 


WIND 

♦ 


Longitudinal  Axis 


f 
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GROSS  PLOW  CHART  FOR  SUGGESTED  ASSIGNMENTS 


360^ 


1.  Logon  the  computer  and  type: 

-EXE  159TD  /VOR/  ' 

2.  Each  player  types  in  a starting 
location  for  his  plane,  and  the  lo- 
cation of  his  destination  airport. 

The  players  should  also  mark 
these  locations  on  the  chart  at 
the  right  as  shown  in  the  sam- 
ple. All  locations  are  with 
respect  to  the  VOR  radio 
station  located  at  the  origin. 

Angular  directions  are  giv- 
en in  degrees  measured 
clockwise  from  North, 
distances  in  miles. 

3.  The  speed  of  the  wind 
and  the  direction  (in  de- 
grees) from  which  it  is 
blowing  are  entered.  Ex- 
ample: A 20  mph  wind 
which  blows  from  West  tot 
East  has  a direction  of 
270,  and  a speed  of  20. 

4.  Each  player  then  enters 
a speed,  a heading,  and  an 
elapsed  time  for  his  plane. 

"Heading’/  is  the  direction 
(measured  clockwise  from 
North)  in  which  you  wish  to 
point  your  plane.  Example:  If 
you  wish  to  point  your  plane 
Southwest,  use  a heading  of  225. 

The  obje'fct  is  to  reach  your  desti- 
nation airport. 

5.  The  computer  will  now  type  out  a 
new  location,  based  on  the  data  you  just  220° 
gave  it.  Repeat  step  4 until  winning  player 
sees  the  message  ,TYou  are  within  sight  of 
destination  (3  miles).  ” 

*See  attached  interaction  and  the  module 
VG^RTAC1’  for  further  details. 


N = O' 

500 


SAMPLE  "LOCATION" 
DISTANCE  - A50 
DIRECTION  - AO 


I 
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SAMPLE  INTERACTION  WITH  THE  AIR  RACE  GAME 


I 


(LOGON) 


-EXE  159TD  /VOR/ 


ALL  DIRECTIONS  ARE  MEASURED  IN  DEGREES 
CLOCKWISE  FROM  NORTH 

ENTER  DISTANCES  OF  PLANES  FROM  VORTAC 
PLANE  1 

?380  ' • - 

PLANE  2 

7440 

ENTER  DIRECTIONS  OF  PLANES  FROM  VORTAC 

PLANE  I 

?50 

PLANE  2 - - 

?320 

ENTER  DISTANCES  OF  DESTINATIONS  FROM  VORTAC 
PLANE  1 
?350 
PLANE  2 
?280 

ENTER  DIRECTIONS  OF  DESTINATIONS  FROM  VORTAC 
PLANE  1 
?200 
PLANE  2 
?I30 

ENTER  WIND  DIRECTION 
? 180 

ENTER  WIND  SPEED 
?10 

PLANE  1 

POSITION  RELATIVE  TO  VORTAC 
DISTANCE**  380  MILES 

RADIAL**  50  DEGREES 

COURSE  AND  DISTANCE  TO  DESTINATION 
215*6308206  DEGREES  *705*1683936 

PLANE  2 

POSITION  RELATIVE  TO  VORTAC 
DISTANCE2*  -440  MILES 

BAD I AL=  320  DEGREES 

COURSE  AND  DISTANCE  TO  DESTINATION 
136* 1135549  DEGREES  717*3958114 

IF  YOU  WISH  TO  FLY  FURTHER  TYPE  YES* 

?YES 


ENTER  PLANES*  SPEEDS* 

PLANE  1 

7115 

PLANE  2 

7110 

. ENTER  HEADINGS* 

PLANE  1 
72 1 0~ 

PLANE  2 
^140 


19 


MILES 


MILES 


/ 

/ 

t 


V 


ENT EH  ELAPSED  TIMES. 

PLANE  1 
7360 
PLANE  2 
7380 
pLANE  1 

POSITION  RELATIVE  TO  VORTAC 
DISTANCE*  298.210868!  MILES 

RADIAL*  1 90.4134233  DEGBEIES 

COURSE  AND  DISTANCE  TO  DESTINATION 
241*591 5096  DEGREES  74.81478979 

PLANE  2 

POSITION  RELATIVE  TO  VORTAC 
DISTANCE*  212.094038  MILES 

RADIAL*  128.9339583  DEGREES 

COURSE  AND  DISTANCE  TO  DESTINATION 
133.3237435  DEGREES  68*05716319 

IF  YOU  WISH  TO  FLY  FURTHER  TYPE  YES. 

7YES 

ENTER  PLANES*  SPEEDS* 

PLANE.  1 
7115 
PLANE  2 
7110 

ENTER  HEADINGS. 

PLANE  1 
7245 
PLANE  2 
7135 

ENTER  ELAPSED  TIMES. 

PLANE  1 
740 

PLANE  2 
740 

PLANE  1 

POSITION  RELATIVE  TO  VORTAC 
DISTANCE*  342.0614764  MILES 

RADIAL*  . 201.1436708  DEGREES 

COURSE  AND  DISTANCE  TO  DESTINATION 
159.5452339  DEGREES  10.5223412 

PLANE  2 

POSITION  RELATIVE  TO  VORTAC  ; 

DISTANCE*  280.8389771  MILES 

RADIAL*  129.4568428  DEGREES  _ 

COURSE  AND  DISTANCE  TO  DESTINATION 
237.2440248  DEGREES  VSr78757797 

YOU  ARE  WITHIN  SIGHT  OF  DESTINATION. 

IF  YOU  WISH  TO  FLY  FURTHER  TYPE  YES. 

7N0 


2 a 


MILES 


MILES 


MILES 


MILES 


